home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / vblank1d.arc / BLANKVGA.ASM next >
Assembly Source File  |  1990-10-05  |  754b  |  34 lines
  1.         .MODEL  SMALL
  2.         .STACK  16
  3.         .CODE
  4. BLANKVGA        PROC    FAR
  5.         MOV     AL,1
  6.         MOV     DX,3C4H
  7.         OUT     DX,AL
  8.         INC     DX
  9.         IN      AL,DX
  10.         OR      AL,20H
  11.         OUT     DX,AL
  12.         MOV     AH,2CH
  13.         INT     21H
  14.         ADD     DH,3
  15.         CMP     DH,60
  16.         JL      _100
  17.         SUB     DH,60
  18. _100:   MOV     BL,DH
  19. _200:   MOV     AH,2CH
  20.         INT     21H
  21.         CMP     BL,DH
  22.         JNE     _200
  23.         MOV     AL,1
  24.         MOV     DX,3C4H
  25.         OUT     DX,AL
  26.         INC     DX
  27.         IN      AL,DX
  28.         AND     AL,NOT 20H
  29.         OUT     DX,AL
  30.         MOV     AX,4C00H
  31.         INT     21H
  32. BLANKVGA        ENDP
  33.         END     BLANKVGA
  34.